home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #1 / Amiga Plus CD - 2000 - No. 1.iso / Games / Oldies / Haktar / Beispiel / DingeVorDerTür < prev    next >
Encoding:
Text File  |  1999-12-03  |  3.2 KB  |  144 lines
  1. rem DingeVorDerTür : Würfel,Stein,vor der Tür
  2.  
  3. thing Würfel
  4.  [
  5.     rem Würfel
  6.   
  7.   handle 0
  8.     rem Der Würfel ist sehr leicht.
  9.   do würfeln
  10.    [
  11.     ifchance 50
  12.      [
  13.         rem fifty-fifty
  14.       print Du hast eine gerade Zahl gewürfelt.
  15.      |
  16.       print Du hast eine ungerade Zahl gewürfelt.
  17.      ]
  18.    ]
  19.  ]
  20.  
  21. thing Stein
  22.  [
  23.     rem Stein
  24.   
  25.     rem So kann man's ohne handle machen:
  26.   ifitemin Stein,INV
  27.    [
  28.     do Stein weglegen
  29.      [
  30.       print Du legst ihn auf den Boden.
  31.       move Stein,INV,ACTROOM
  32.         rem Der Stein wird aus dem Inventar des Helden gelöscht und in den
  33.         rem aktuellen Raum gelegt. Dies ist der Raum, in dem der Held gerade ist.
  34.       addweight -1
  35.         rem Wenn man ihn nicht mehr trägt, verringert sich auch das Gewicht der
  36.         rem mitgeführten Gegenstände.
  37.      ]
  38.    |
  39.     do Stein nehmen
  40.      [
  41.       ifweight 1
  42.        [
  43.           rem Wenn der Held noch 1 kg mehr tragen kann...
  44.         print Du nimmst den Stein.
  45.         gone Stein,ACTROOM
  46.           rem Der Stein wird aus dem Raum gelöscht.
  47.         create Stein,INV
  48.           rem In der Tasche des Helden erscheint ein Stein.
  49.           rem Das ist etwas umständlich und soll nur zeigen, wie man gone und
  50.           rem create benutzt. Normalerweise steht hier move Stein,ACTROOM,INV.
  51.         addweight 1
  52.           rem Der Stein wiegt 1kg.
  53.        |
  54.         print Der Stein ist etwas zu schwer.
  55.        ]
  56.      ]
  57.    ]
  58.   do magische Formel an den Stein richten
  59.    [
  60.     ifchance 60
  61.      [
  62.       print Was wollen Sie sagen ?
  63.      |
  64.       print Welche Worte werden Sie sprechen ?
  65.      ]
  66.       rem So kann man ein bisserl Abwechslung in die Ausgaben bringen.
  67.     input
  68.       rem Der User gibt nun etwas ein.
  69.     ifinput Worga
  70.      [
  71.         rem Wenn beim letzten input Worga eingegeben wurde...
  72.       print Der Stein leuchtet kurz auf.
  73.       execute Magie Des Steins
  74.      |
  75.       ifinput Banzai
  76.        [
  77.         print Ein summender Ton ertönt.
  78.         execute Magie des Steins
  79.        |
  80.         print Nichts passiert.
  81.        ]
  82.      ]
  83.    ]
  84.  ]
  85.  
  86. thing vor der Tür
  87.  [
  88.   rem Vor der Tür
  89.  
  90.   items Stein,Würfel
  91.     rem Hier liegen ein Stein und ein Würfel.
  92.   ifflag Tür offen
  93.    [
  94.     do durch die Tür gehen
  95.      [
  96.       print Du gehst in die kleine Hütte.
  97.       go Hütte
  98.      ]
  99.    |]
  100.   do tanzen
  101.    [
  102.     startchoose
  103.     rem Bei 'tanzen' gibt es noch weitere Auswahlmöglichkeiten.
  104.     rem Hier fangen sie an.
  105.     choose Walzer
  106.      [
  107.       rem weitere Auswahlmöglichkeit
  108.       print dddddadibdada-dadada
  109.      ]
  110.     choose Tango
  111.      [
  112.       rem weitere Auswahlmöglichkeit
  113.       print schlippdidldiedipp
  114.      ]
  115.     endchoose
  116.     rem Das waren alle weiteren Auswahlmöglichkeiten.
  117.    ]
  118.   do an der Tür klopfen
  119.    [
  120.     ifvar Tür klopfen,0,2
  121.      [
  122.         rem Wenn an der Tür garnicht, 1 oder 2 mal geklopft wurde.
  123.     
  124.       print Du klopfst an, aber auch nach kurzer Wartezeit rührt sich nichts.
  125.       addtime 1
  126.         rem Wartezeit...
  127.       addvar Tür klopfen,1
  128.         rem Wir zählen das Klopfen mit.
  129.       printvar Du hast jetzt also,Tür klopfen,mal geklopft !
  130.      |
  131.       ifvar Tür klopfen,3,3
  132.        [
  133.           rem Wenn genau dreimal geklopft wurde.
  134.       
  135.         print Die Tür gleitet knarrend auf, aber niemand ist zu sehen.
  136.         setflag Tür offen
  137.        |
  138.         print Klopf klopf...
  139.        ]
  140.      ]
  141.    ]
  142.  ]
  143.  
  144.